home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 2.iso / misc / allma.zip / WHTPRINT.SMM < prev   
INI File  |  1995-02-06  |  12KB  |  610 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     _macro.sty
  5. [files]
  6. [charset]
  7.     82
  8.     ANSI (Windows, IBM CP 1252)
  9. [revisions]
  10.     0
  11. [prn]
  12.     Epson LQ-510
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [fldnames]
  18.     Field1
  19.     Field2
  20.     Field3
  21.     Field4
  22.     Field5
  23.     Field6
  24.     Field7
  25.     Field8
  26. [desc]
  27.     Calls up Print icons
  28.     
  29.     
  30.     
  31.     
  32.     792130476
  33.     52
  34.     755985920
  35.     587
  36.     4
  37.     563
  38.     3673
  39.     11
  40.     14
  41.     
  42.     
  43.     
  44.     
  45.     
  46.     
  47.     1
  48. [fopts]
  49.     0
  50.     1
  51.     0
  52.     0
  53.     
  54.     
  55. [lnopts]
  56.     2
  57.     Body Text
  58.     1
  59. [docopts]
  60.     5
  61.     2
  62. [GramStyle]
  63.     
  64. [ParaNum]
  65.     1
  66. [lay]
  67.     Standard
  68.     513
  69.     [rght]
  70.         15840
  71.         12240
  72.         1
  73.         1440
  74.         1440
  75.         1
  76.         1440
  77.         1440
  78.         2
  79.         1
  80.         0
  81.         1
  82.         0
  83.         2
  84.         1
  85.         1440
  86.         10800
  87.         5
  88.         1
  89.         720
  90.         1
  91.         1440
  92.         1
  93.         2162
  94.         1
  95.         2883
  96.         1
  97.         3596
  98.     [hrght]
  99.     [lyfrm]
  100.         1
  101.         11200
  102.         0
  103.         0
  104.         12240
  105.         1440
  106.         0
  107.         1
  108.         3
  109.         1 0 0 0 0 0 0
  110.         0
  111.         0
  112.         1
  113.     [frmlay]
  114.         1440
  115.         12240
  116.         1
  117.         1440
  118.         144
  119.         1
  120.         360
  121.         1440
  122.         0
  123.         1
  124.         0
  125.         1
  126.         1
  127.         0
  128.         1
  129.         1440
  130.         10800
  131.         1
  132.         3
  133.         9360
  134.     [txt]
  135.  
  136. <+!>Created by Ashley Bass<-!>
  137.  
  138. <+!>December 15, 1993<-!>  (this was the first one)
  139.  
  140. >
  141.     [frght]
  142.     [lyfrm]
  143.         1
  144.         13248
  145.         0
  146.         14400
  147.         12240
  148.         15840
  149.         0
  150.         1
  151.         3
  152.         1 0 0 0 0 0 0
  153.         0
  154.         0
  155.         2
  156.     [frmlay]
  157.         15840
  158.         12240
  159.         1
  160.         1440
  161.         0
  162.         1
  163.         14544
  164.         1440
  165.         0
  166.         1
  167.         0
  168.         1
  169.         1
  170.         0
  171.         1
  172.         1440
  173.         10800
  174.         2
  175.         2
  176.         4695
  177.         3
  178.         9360
  179.     [txt]
  180. >
  181. [elay]
  182. [l1]
  183.     0
  184. [pg]
  185.     4
  186.     44 0 18 0 1 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  187.     63 27 14 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  188.     100 46 37 0 0 1 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  189.     107 0 38 1025 0 0 0 65535 65535 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  190. [edoc]
  191. @Defines@<:#552,9360>Define    MoveWindow()    DllCall("User,MoveWindow,HHHHHHA",%1,%2,%3,%4,%5,%6)
  192.  
  193. @Defines@<:#276,9360>Define    GetSize()        DllCall("user,GetWindowRect,HHN",%1,%2)
  194.  
  195. @Defines@<:#276,9360>
  196.  
  197. @Function@<:#288,9360>function begin(hdlg)
  198.  
  199. <:#276,9360>thisfile = getrunningmacrofile$()
  200.  
  201. <:#276,9360>metrics = getprofilestring$("whtprint", "Metrics", "{windir}amipro2.ini")
  202.  
  203. @If Endif@<:#276,9360>    if metrics != ""
  204.  
  205. <:#276,9360>        setdlgcallback(0, "{thisfile}!init")
  206.  
  207. @If Endif@<:#276,9360>    endif
  208.  
  209. <:#276,9360>setdlgcallback(20, "{thisfile}!curloc")
  210.  
  211. @If Endif@<:#276,9360>DlgKeyInterrupt(<[>F1], "HelpFun")  ' This if F1
  212.  
  213. <:#276,9360>Box = DialogBox(".", "Printwhat")
  214.  
  215. <:#276,9360>IF Box = -1
  216.  
  217. <:#276,9360>Message("Could not open dialog box; Exiting macro.")
  218.  
  219. <:#276,9360>EXIT FUNCTION
  220.  
  221. <:#276,9360>ELSEIF Box = 0
  222.  
  223. <:#276,9360>EXIT FUNCTION
  224.  
  225. <:#276,9360>ELSEIF Box = 9
  226.  
  227. <:#276,9360>FilePrint
  228.  
  229. <:#276,9360>ELSEIF Box = 3
  230.  
  231. <:#276,9360>call printnow.smm()
  232.  
  233. <:#276,9360>ELSEIF Box = 4
  234.  
  235. <:#276,9360>call prnpages.smm()
  236.  
  237. <:#276,9360>ELSEIF Box = 5
  238.  
  239. <:#276,9360>call prnshade.smm()
  240.  
  241. <:#276,9360>ELSEIF Box = 6
  242.  
  243. <:#276,9360>PrintEnvelope()
  244.  
  245. <:#276,9360>ELSEIF Box = 7
  246.  
  247. <:#276,9360>call prnbatch.smm()
  248.  
  249. <:#276,9360>ELSEIF Box = 8
  250.  
  251. <:#276,9360>PrintSetup
  252.  
  253. <:#276,9360>call whtprint.smm()
  254.  
  255. <:#276,9360>ELSEIF Box=10 <:f220,,><+!>'Delete the purple text and <-!><:f><+!><:f220,,>apostrophes to activate fax button<-!><:f>
  256.  
  257. <:#552,9360><:f240,BArial,129,0,255>Message("<:f><:f240,BArial,129,0,255>I don't know the name of your Fax driver or the Comm port your modem is attached to.  Open WHTPRINT.SMM and give me the info I need.<:f><:f240,BArial,129,0,255>")<:f>
  258.  
  259. <:#288,9360><:f240,BArial,129,0,255><+!>'<-!><:f><+*>static=getinfo(62)<-*>
  260.  
  261. <:#288,9360><:f240,BArial,129,0,255><+!>'<-!><:f><+*>printsetup("<-*><:f240,2Times New Roman,0,0,255>WINFAX<:f><+*>" "COM<-*><:f240,2Times New Roman,255,0,0>2<:f><+*>:")<-*> 
  262. <:f240,2Times New Roman,0,0,255>'Change the Blue text to match your fax driver
  263.  
  264. <:#288,9360><:f240,BArial,129,0,255><+!>'<-!><:f><+*>fileprint(1,1,9999,1)<-*>        <:f240,2Times New Roman,255,0,0>  'Change the Red number to match your fax Comm port<:f>
  265.  
  266. <:#288,9360><:f240,BArial,129,0,255><-!><+!>'<-!><:f><+*>printsetup("{<++>static<-+>}" "LPT<-*>1:")
  267.  
  268. <:#276,9360>ELSEIF Box=11
  269.  
  270. <:#276,9360>call crash()
  271.  
  272. <:#276,9360>ENDIF
  273.  
  274. <:#276,9360>END FUNCTION
  275.  
  276. <:#276,9360>
  277.  
  278. @Function@<-!>DIALOG    Printwhat
  279.  
  280. <:#552,9360>-2134900736    19    55    28    111    85    ""    "AmiDialog"    "Print what?"
  281.  
  282. <:#828,9360>6    3    15    15    3    1342373896    "button"    "c:\amipro\icons\dlgicos\prnfast.bmp"    0 
  283.  
  284. <:#552,9360>83    7    24    14    9    1342373888    "button"    "Norm"    0 
  285.  
  286. <:#828,9360>6    19    15    15    4    1342373896    "button"    "c:\amipro\icons\dlgicos\prnpgs.bmp"    0 
  287.  
  288. <:#828,9360>6    35    15    15    5    1342373896    "button"    "c:\amipro\icons\dlgicos\prnselec.bmp"    0 
  289.  
  290. <:#828,9360>6    51    15    15    6    1342373896    "button"    "c:\amipro\icons\dlgicos\prnenvel.bmp"    0 
  291.  
  292. <:#828,9360>6    67    15    15    7    1342373896    "button"    "c:\amipro\icons\dlgicos\prnmult.bmp"    0 
  293.  
  294. <:#828,9360>74    51    10    10    10    1342373896    "button"    "c:\amipro\icons\dlgicos\prnfax.bmp"    0 
  295.  
  296. <:#828,9360>96    51    10    10    8    1342373896    "button"    "c:\amipro\icons\dlgicos\prnsetup.bmp"    0 
  297.  
  298. <:#828,9360>104    78    5    5    11    1342373896    "button"    "c:\amipro\icons\dlgicos\in_copy.bmp"    0 
  299.  
  300. <:#552,9360>26    55    46    10    1003    1342177280    "static"    "Envelopes"    0 
  301.  
  302. <:#552,9360>26    39    50    10    1004    1342177280    "static"    "Selected Area"    0 
  303.  
  304. <:#552,9360>26    23    48    10    1005    1342177280    "static"    "Specific Pages"    0 
  305.  
  306. <:#552,9360>26    7    46    10    1006    1342177280    "static"    "Fast/Defaults"    0 
  307.  
  308. <:#552,9360>26    71    44    10    1007    1342177280    "static"    "Multiple Files"    0 
  309.  
  310. <:#552,9360>83    31    24    12    2    1342373888    "button"    "Esc"    0 
  311.  
  312. <:#552,9360>90    27    10    3    20    1342373888    "button"    ""    0 
  313.  
  314. <:#552,9360>92    62    19    12    1000    1342177280    "static"    "Setup"    0 
  315.  
  316. 0    1    111    84    1002    1342177287    "static"    ""    0 
  317.  
  318. <:#552,9360>73    62    13    9    1001    1342177280    "static"    "Fax"    0 
  319.  
  320. @Function@<:#288,9360>END DIALOG
  321.  
  322. <:#276,9360>
  323.  
  324. @Function@<:#288,9360>function init(hdlg)
  325.  
  326. <:#276,9360>metrics = getprofilestring$("whtprint", "Metrics", "{windir}amipro2.ini")
  327.  
  328. <:#276,9360>x = strfield$(metrics, 1, ",")
  329.  
  330. <:#276,9360>y = strfield$(metrics, 2, ",")
  331.  
  332. <:#276,9360>w = strfield$(metrics, 3, ",")
  333.  
  334. <:#276,9360>h = strfield$(metrics, 4, ",")
  335.  
  336. <:#276,9360>movewindow(hdlg, x, y, w, h, 1)
  337.  
  338. @Function@<:#288,9360>end function
  339.  
  340. @Function@<:#288,9360>function curloc(hdlg)
  341.  
  342. <:#276,9360>dim coord(4)
  343.  
  344. <:#276,9360>getsize(hdlg, &coord)
  345.  
  346. <:#276,9360>x = coord(1)
  347.  
  348. <:#276,9360>y = coord(2)
  349.  
  350. <:#276,9360>cx = coord(3)
  351.  
  352. <:#276,9360>cy = coord(4)
  353.  
  354. <:#276,9360>w = cx - x
  355.  
  356. <:#276,9360>h = cy - y
  357.  
  358. <:#552,9360>writeprofilestring("whtprint", "Metrics", strcat$(x, ",", y, ",", w, ",", h), "{windir}amipro2.ini")
  359.  
  360. @Function@<:#288,9360>end function
  361.  
  362. <:#284,9360><:f240,2Times New Roman,0,0,0>FUNCTION HelpFun(hdlg, key)
  363.  
  364. <:#284,9360><:f240,2Times New Roman,0,0,0>DialogBox(".","Helper")
  365.  
  366. @Function@<:#284,9360><+!><:f240,2Times New Roman,0,0,0>end function<-!><:f>
  367.  
  368. <:#276,9360>DIALOG    Helper
  369.  
  370. <:#552,9360>-2143289344    4    127    82    108    54    ""    ""    ""
  371.  
  372. <:#552,9360>39    38    33    12    2    1342373888    "button"    "&Close"    0 
  373.  
  374. <:#552,9360>91    44    12    7    1000    1342177280    "static"    "abb"    0 
  375.  
  376. <:#828,9360>10    7    90    26    1001    1342177281    "static"    "Click on the button that represents the command you wish to execute."    0 
  377.  
  378. <:#552,9360>1    1    106    52    1002    1342177287    "static"    ""    0 
  379.  
  380. <:#276,9360>END DIALOG
  381.  
  382. <:#284,9360><:f240,2Times New Roman,255,255,255><+*>FUNCTION crash()<:f240,BArial,255,255,255><-*>
  383.  
  384. <:#276,9360><:f240,BArial,255,255,255>DialogBox(".","crash")
  385.  
  386. @Function@<:#288,9360><:f240,BArial,255,255,255>End Function
  387.  
  388. <:#276,9360><:f240,BArial,255,255,255>DIALOG    crash
  389.  
  390. <:#552,9360><:f240,BArial,255,255,255>-2134376448    6     91    25    155    189    ""    ""    "Toolbar Macros by:"<:f>
  391.  
  392. <:#568,9360><+*><:f240,2Times New Roman,255,255,255>0    1    155    188    1002    1342177289    "static"    ""    0 
  393. <-*>
  394.  
  395. <:#568,9360><+*><:f240,2Times New Roman,255,255,255>1    2    153    186    1002    1342177289    "static"    ""    0 
  396. <:f240,BArial,255,255,255><-*>
  397.  
  398. <:#552,9360><:f240,BArial,255,255,255>2    3    151    184    1002    1342177287    "static"    ""    0 
  399.  
  400. <:#552,9360><:f240,BArial,255,255,255>3    4    149    182    1002    1342177287    "static"    ""    0 
  401.  
  402. <:#552,9360><:f240,BArial,255,255,255>5    6    145    177    1002    1342177289    "static"    "text"    0 
  403.  
  404. <:#828,9360><:f240,BArial,255,255,255>6    7    147    160    1001    1342177290    "static"    "c:\amipro\icons\dlgicos\in_cred.bmp"    0 
  405.  
  406. <:#276,9360><:f240,BArial,255,255,255>END DIALOG<:f>
  407.  
  408. >
  409.  
  410. [Embedded]
  411. 00008255
  412. >
  413. [macsum] 8
  414. begin 0 1 5 3
  415. Printwhat 999 0 -1 43
  416. init 2229 1 7 66
  417. curloc 2477 1 9 74
  418. HelpFun 2755 2 1 85
  419. Helper 2798 0 -1 88
  420. crash 3099 0 1 95
  421. crash 3139 0 -1 98
  422. [macse]
  423. 14 begin
  424. 0 802
  425. 13
  426. 8 2
  427. 0 286 "whtprint" "Metrics" "{4}amipro2.ini"
  428. 13
  429. 8 3
  430. 6 3
  431. 7 ""
  432. 18 1
  433. 11 00000129
  434. 0 41 0 "{2}!init"
  435. 0 41 20 "{2}!curloc"
  436. 0 47 112 "HelpFun"
  437. 0 26 "." "Printwhat"
  438. 13
  439. 8 5
  440. 6 5
  441. 5 -1
  442. 18 0
  443. 11 00000306
  444. 0 3 "Could not open dialog box; Exiting macro."
  445. 6 1
  446. 15
  447. 9
  448. 10 00000987
  449. 6 5
  450. 5 0
  451. 18 0
  452. 11 00000360
  453. 6 1
  454. 15
  455. 9
  456. 10 00000987
  457. 6 5
  458. 5 9
  459. 18 0
  460. 11 00000410
  461. 24 111
  462. 10 00000987
  463. 6 5
  464. 5 3
  465. 18 0
  466. 11 00000469
  467. 16 printnow.smm
  468. 10 00000987
  469. 6 5
  470. 5 4
  471. 18 0
  472. 11 00000528
  473. 16 prnpages.smm
  474. 10 00000987
  475. 6 5
  476. 5 5
  477. 18 0
  478. 11 00000587
  479. 16 prnshade.smm
  480. 10 00000987
  481. 6 5
  482. 5 6
  483. 18 0
  484. 11 00000638
  485. 2 237 1
  486. 10 00000987
  487. 6 5
  488. 5 7
  489. 18 0
  490. 11 00000697
  491. 16 prnbatch.smm
  492. 10 00000987
  493. 6 5
  494. 5 8
  495. 18 0
  496. 11 00000764
  497. 24 112
  498. 16 whtprint.smm
  499. 10 00000987
  500. 6 5
  501. 5 10
  502. 18 0
  503. 11 00000947
  504. 0 3 "I don't know the name of your Fax driver or the Comm port your modem is attached to.  Open WHTPRINT.SMM and give me the info I need."
  505. 10 00000987
  506. 6 5
  507. 5 11
  508. 18 0
  509. 11 00000987
  510. 16 crash
  511. 6 1
  512. 15
  513. 9
  514. DIALOG Printwhat
  515. -2134900736 19 55 28 111 85 "" "AmiDialog" "Print what?" 
  516. 6 3 15 15 3 1342373896 "button" "c:\amipro\icons\dlgicos\prnfast.bmp" 0 
  517. 83 7 24 14 9 1342373888 "button" "Norm" 0 
  518. 6 19 15 15 4 1342373896 "button" "c:\amipro\icons\dlgicos\prnpgs.bmp" 0 
  519. 6 35 15 15 5 1342373896 "button" "c:\amipro\icons\dlgicos\prnselec.bmp" 0 
  520. 6 51 15 15 6 1342373896 "button" "c:\amipro\icons\dlgicos\prnenvel.bmp" 0 
  521. 6 67 15 15 7 1342373896 "button" "c:\amipro\icons\dlgicos\prnmult.bmp" 0 
  522. 74 51 10 10 10 1342373896 "button" "c:\amipro\icons\dlgicos\prnfax.bmp" 0 
  523. 96 51 10 10 8 1342373896 "button" "c:\amipro\icons\dlgicos\prnsetup.bmp" 0 
  524. 104 78 5 5 11 1342373896 "button" "c:\amipro\icons\dlgicos\in_copy.bmp" 0 
  525. 26 55 46 10 1003 1342177280 "static" "Envelopes" 0 
  526. 26 39 50 10 1004 1342177280 "static" "Selected Area" 0 
  527. 26 23 48 10 1005 1342177280 "static" "Specific Pages" 0 
  528. 26 7 46 10 1006 1342177280 "static" "Fast/Defaults" 0 
  529. 26 71 44 10 1007 1342177280 "static" "Multiple Files" 0 
  530. 83 31 24 12 2 1342373888 "button" "Esc" 0 
  531. 90 27 10 3 20 1342373888 "button" "" 0 
  532. 92 62 19 12 1000 1342177280 "static" "Setup" 0 
  533. 0 1 111 84 1002 1342177287 "static" "" 0 
  534. 73 62 13 9 1001 1342177280 "static" "Fax" 0 
  535. 14 init
  536. 0 286 "whtprint" "Metrics" "{3}amipro2.ini"
  537. 13
  538. 8 2
  539. 0 20 "{2}" 1 ","
  540. 13
  541. 8 4
  542. 0 20 "{2}" 2 ","
  543. 13
  544. 8 5
  545. 0 20 "{2}" 3 ","
  546. 13
  547. 8 6
  548. 0 20 "{2}" 4 ","
  549. 13
  550. 8 7
  551. 0 284 "User,MoveWindow,HHHHHHA" "{0}" "{4}" "{5}" "{6}" "{7}" 1
  552. 6 1
  553. 15
  554. 9
  555. 14 curloc
  556. 5 4
  557. 21 2 [X]
  558. 0 284 "user,GetWindowRect,HHN" "{0}" &2
  559. 5 1
  560. 22 2
  561. 8 3
  562. 5 2
  563. 22 2
  564. 8 4
  565. 5 3
  566. 22 2
  567. 8 5
  568. 5 4
  569. 22 2
  570. 8 6
  571. 6 5
  572. 6 3
  573. 3 1
  574. 8 7
  575. 6 6
  576. 6 4
  577. 3 1
  578. 8 8
  579. 0 16 "{3}" "," "{4}" "," "{7}" "," "{8}"
  580. 13
  581. 0 287 "whtprint" "Metrics" [X] "{9}amipro2.ini"
  582. 6 1
  583. 15
  584. 9
  585. 14 HelpFun
  586. 0 26 "." "Helper"
  587. 6 2
  588. 15
  589. 9
  590. DIALOG Helper
  591. -2143289344 4 127 82 108 54 "" "" "" 
  592. 39 38 33 12 2 1342373888 "button" "&Close" 0 
  593. 91 44 12 7 1000 1342177280 "static" "abb" 0 
  594. 10 7 90 26 1001 1342177281 "static" "Click on the button that represents the command you wish to execute." 0 
  595. 1 1 106 52 1002 1342177287 "static" "" 0 
  596. 14 crash
  597. 0 26 "." "crash"
  598. 6 0
  599. 15
  600. 9
  601. DIALOG crash
  602. -2134376448 6 91 25 155 189 "" "" "Toolbar Macros by:" 
  603. 0 1 155 188 1002 1342177289 "static" "" 0 
  604. 1 2 153 186 1002 1342177289 "static" "" 0 
  605. 2 3 151 184 1002 1342177287 "static" "" 0 
  606. 3 4 149 182 1002 1342177287 "static" "" 0 
  607. 5 6 145 177 1002 1342177289 "static" "text" 0 
  608. 6 7 147 160 1001 1342177290 "static" "c:\amipro\icons\dlgicos\in_cred.bmp" 0 
  609. 00008280
  610.